home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / bbs / pad321.zip / VERIFY.MEX < prev    next >
Text File  |  1996-08-08  |  609b  |  34 lines
  1. #ifndef __MAX_MH
  2. #include <max.mh>
  3. #define __MAX_MH
  4. #endif
  5.  
  6. #ifndef __VERIFY_MH
  7. #include "verify.mh"
  8. #endif
  9.  
  10. #ifndef __INFO_MH
  11. #include "info.mh"
  12. #endif
  13.  
  14. int main () {
  15.   string: line, phoneNum, newPhone, city;
  16.   int: dialType, fd;
  17.  
  18.   if (fileexists (checkNumTempFile) = False) return 0;
  19.  
  20.   fd := open (checkNumTempFile, IOPEN_READ);
  21.   readln (fd, line);
  22.   dialType := strtoi (line);
  23.   readln (fd, phoneNum);
  24.   readln (fd, newPhone);
  25.   readln (fd, city);
  26.   close (fd);
  27.  
  28.   if (phoneNum <> "")
  29.     verify (phoneNum, newPhone, city, dialType);
  30.   remove (checkNumTempFile);
  31.   }
  32.  
  33.  
  34.